supplied-by
: [undefined]  ( "name" -- f )  bl word find nip 0= ; immediate
